home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / programming / source / retinasource.lha / RBO_SCode.lha / Include / bpls.i < prev    next >
Text File  |  1993-05-03  |  566b  |  32 lines
  1. putbpls:
  2.     move.w     d0,bitplanes+p0l
  3.     swap     d0
  4.     move.w     d0,bitplanes+p0h        scn address in copperlist
  5.     swap     d0
  6.     
  7.     add.l     #40,d0
  8.     move.w     d0,bitplanes+p1l
  9.     swap     d0
  10.     move.w    d0,bitplanes+p1h        scn address in copperlist
  11.     swap     d0    
  12.  
  13.     add.l     #40,d0
  14.     move.w     d0,bitplanes+p2l
  15.     swap     d0
  16.     move.w     d0,bitplanes+p2h        scn address in copperlist
  17.     swap     d0
  18.  
  19.  
  20.     add.l     #40,d0
  21.     move.w     d0,bitplanes+p3l
  22.     swap     d0
  23.     move.w     d0,bitplanes+p3h        scn address in copperlist
  24.     swap     d0
  25.  
  26.     add.l     #40,d0
  27.     move.w     d0,bitplanes+p4l
  28.     swap     d0
  29.     move.w     d0,bitplanes+p4h        scn address in copperlist
  30.  
  31.     rts
  32.